home *** CD-ROM | disk | FTP | other *** search
/ CD School House 9 / CD School House 9.0 - Wayzata Technology (1994).iso / pc / games / mac / __adventureland__ / __adventure_helpers__ / tarotmatic / background_2685.txt < prev    next >
Text File  |  1991-01-02  |  7KB  |  341 lines

  1. -- background: 2685 from stack: in
  2. -- bmap block id: 3123
  3. -- flags: 4000
  4. -- background id: 0
  5. -- name: Deck
  6. ----- HyperTalk script -----
  7. on openCard
  8.   hide message box
  9.   pass openCard
  10. end openCard
  11.  
  12. on closeCard
  13.   show bkgnd field "Upright"
  14.   show bkgnd field "Reversed"
  15.   pass closeCard
  16. end closeCard
  17.  
  18.  
  19.  
  20. -- part 1 (field)
  21. -- low flags: 01
  22. -- high flags: 0002
  23. -- rect: left=211 top=21 right=45 bottom=451
  24. -- title width / last selected line: 0
  25. -- icon id / first selected line: 0 / 0
  26. -- text alignment: 1
  27. -- font id: 6
  28. -- text size: 18
  29. -- style flags: 0
  30. -- line height: 24
  31. -- part name: Card Name
  32. ----- HyperTalk script -----
  33. on closeField
  34.   set the name of this card to line 1 of me
  35. end closeField
  36.  
  37.  
  38.  
  39. -- part 2 (field)
  40. -- low flags: 00
  41. -- high flags: 2002
  42. -- rect: left=211 top=74 right=236 bottom=359
  43. -- title width / last selected line: 0
  44. -- icon id / first selected line: 0 / 0
  45. -- text alignment: 1
  46. -- font id: 3
  47. -- text size: 10
  48. -- style flags: 0
  49. -- line height: 13
  50. -- part name: Upright
  51.  
  52.  
  53. -- part 3 (button)
  54. -- low flags: 00
  55. -- high flags: 2000
  56. -- rect: left=477 top=303 right=336 bottom=512
  57. -- title width / last selected line: 0
  58. -- icon id / first selected line: 20098 / 20098
  59. -- text alignment: 1
  60. -- font id: 0
  61. -- text size: 12
  62. -- style flags: 0
  63. -- line height: 16
  64. -- part name: Home
  65. ----- HyperTalk script -----
  66. on mouseUp
  67.   visual dissolve slow
  68.   go home
  69. end mouseUp
  70.  
  71.  
  72.  
  73. -- part 4 (button)
  74. -- low flags: 00
  75. -- high flags: 2000
  76. -- rect: left=235 top=257 right=290 bottom=270
  77. -- title width / last selected line: 0
  78. -- icon id / first selected line: 0 / 0
  79. -- text alignment: 1
  80. -- font id: 0
  81. -- text size: 12
  82. -- style flags: 0
  83. -- line height: 16
  84. -- part name: To Reading
  85. ----- HyperTalk script -----
  86. on mouseUp
  87.   visual dissolve slow
  88.   play "Buttons1"
  89.   go card 1 of bkgnd "Card Table"
  90. end mouseUp
  91.  
  92.  
  93.  
  94. -- part 5 (button)
  95. -- low flags: 00
  96. -- high flags: 2000
  97. -- rect: left=383 top=303 right=336 bottom=408
  98. -- title width / last selected line: 0
  99. -- icon id / first selected line: 27009 / 27009
  100. -- text alignment: 1
  101. -- font id: 0
  102. -- text size: 12
  103. -- style flags: 0
  104. -- line height: 16
  105. -- part name: Next
  106. ----- HyperTalk script -----
  107. on mouseUp
  108.   visual dissolve fast
  109.   go next card of this bkgnd
  110. end mouseUp
  111.  
  112.  
  113.  
  114. -- part 6 (button)
  115. -- low flags: 00
  116. -- high flags: A000
  117. -- rect: left=204 top=294 right=341 bottom=300
  118. -- title width / last selected line: 0
  119. -- icon id / first selected line: 20186 / 20186
  120. -- text alignment: 1
  121. -- font id: 0
  122. -- text size: 12
  123. -- style flags: 0
  124. -- line height: 16
  125. -- part name: Pick As Significator
  126. ----- HyperTalk script -----
  127. on mouseUp
  128.  
  129.   global SigName
  130.   put the short name of this card into SigName
  131.   play "Buttons2"
  132.   go card 1 of bkgnd "Card Table"
  133.   put SigName into bkgnd field 11
  134.  
  135. end mouseUp
  136.  
  137.  
  138.  
  139. -- part 7 (button)
  140. -- low flags: 00
  141. -- high flags: 2000
  142. -- rect: left=359 top=303 right=336 bottom=384
  143. -- title width / last selected line: 0
  144. -- icon id / first selected line: 9301 / 9301
  145. -- text alignment: 1
  146. -- font id: 0
  147. -- text size: 12
  148. -- style flags: 0
  149. -- line height: 16
  150. -- part name: Prev
  151. ----- HyperTalk script -----
  152. on mouseUp
  153.   visual dissolve fast
  154.   go previous card of this bkgnd
  155. end mouseUp
  156.  
  157.  
  158.  
  159. -- part 9 (field)
  160. -- low flags: 00
  161. -- high flags: 2002
  162. -- rect: left=362 top=74 right=236 bottom=510
  163. -- title width / last selected line: 0
  164. -- icon id / first selected line: 0 / 0
  165. -- text alignment: 1
  166. -- font id: 3
  167. -- text size: 10
  168. -- style flags: 0
  169. -- line height: 13
  170. -- part name: Reversed
  171.  
  172.  
  173. -- part 10 (field)
  174. -- low flags: 00
  175. -- high flags: 0002
  176. -- rect: left=362 top=239 right=255 bottom=510
  177. -- title width / last selected line: 0
  178. -- icon id / first selected line: 0 / 0
  179. -- text alignment: 0
  180. -- font id: 3
  181. -- text size: 10
  182. -- style flags: 0
  183. -- line height: 13
  184. -- part name: Element
  185.  
  186.  
  187. -- part 11 (button)
  188. -- low flags: 00
  189. -- high flags: 2000
  190. -- rect: left=326 top=303 right=336 bottom=358
  191. -- title width / last selected line: 0
  192. -- icon id / first selected line: 5472 / 5472
  193. -- text alignment: 1
  194. -- font id: 0
  195. -- text size: 12
  196. -- style flags: 0
  197. -- line height: 16
  198. -- part name: First
  199. ----- HyperTalk script -----
  200. on mouseUp
  201.   visual scroll right
  202.   go first card of this bkgnd
  203. end mouseUp
  204.  
  205.  
  206.  
  207. -- part 12 (button)
  208. -- low flags: 00
  209. -- high flags: 2000
  210. -- rect: left=409 top=303 right=336 bottom=441
  211. -- title width / last selected line: 0
  212. -- icon id / first selected line: 766 / 766
  213. -- text alignment: 1
  214. -- font id: 0
  215. -- text size: 12
  216. -- style flags: 0
  217. -- line height: 16
  218. -- part name: Last
  219. ----- HyperTalk script -----
  220. on mouseUp
  221.   visual scroll right
  222.   go last card of this bkgnd
  223. end mouseUp
  224.  
  225.  
  226.  
  227. -- part 13 (button)
  228. -- low flags: 00
  229. -- high flags: 2000
  230. -- rect: left=292 top=303 right=336 bottom=327
  231. -- title width / last selected line: 0
  232. -- icon id / first selected line: 8538 / 8538
  233. -- text alignment: 1
  234. -- font id: 0
  235. -- text size: 12
  236. -- style flags: 0
  237. -- line height: 16
  238. -- part name: Find
  239. ----- HyperTalk script -----
  240. on mouseUp
  241.   doMenu "Find..."
  242. end mouseUp
  243.  
  244.  
  245.  
  246. -- part 14 (field)
  247. -- low flags: 00
  248. -- high flags: 0002
  249. -- rect: left=362 top=257 right=273 bottom=510
  250. -- title width / last selected line: 0
  251. -- icon id / first selected line: 0 / 0
  252. -- text alignment: 0
  253. -- font id: 3
  254. -- text size: 10
  255. -- style flags: 0
  256. -- line height: 13
  257. -- part name: 
  258.  
  259.  
  260. -- part 15 (field)
  261. -- low flags: 00
  262. -- high flags: 0002
  263. -- rect: left=362 top=275 right=304 bottom=510
  264. -- title width / last selected line: 0
  265. -- icon id / first selected line: 0 / 0
  266. -- text alignment: 0
  267. -- font id: 3
  268. -- text size: 10
  269. -- style flags: 0
  270. -- line height: 13
  271. -- part name: 
  272.  
  273.  
  274. -- part 23 (button)
  275. -- low flags: 00
  276. -- high flags: 2000
  277. -- rect: left=442 top=309 right=332 bottom=481
  278. -- title width / last selected line: 0
  279. -- icon id / first selected line: 32670 / 32670
  280. -- text alignment: 1
  281. -- font id: 0
  282. -- text size: 12
  283. -- style flags: 0
  284. -- line height: 16
  285. -- part name: Scan
  286. ----- HyperTalk script -----
  287. on mouseUp
  288.   show all cards
  289. end mouseUp
  290.  
  291.  
  292.  
  293. -- part 24 (field)
  294. -- low flags: 01
  295. -- high flags: 0002
  296. -- rect: left=462 top=28 right=52 bottom=500
  297. -- title width / last selected line: 0
  298. -- icon id / first selected line: 0 / 0
  299. -- text alignment: 1
  300. -- font id: 3
  301. -- text size: 14
  302. -- style flags: 256
  303. -- line height: 22
  304. -- part name: Number
  305.  
  306.  
  307. -- part 25 (field)
  308. -- low flags: 01
  309. -- high flags: 0002
  310. -- rect: left=277 top=46 right=61 bottom=451
  311. -- title width / last selected line: 0
  312. -- icon id / first selected line: 0 / 0
  313. -- text alignment: 1
  314. -- font id: 3
  315. -- text size: 10
  316. -- style flags: 256
  317. -- line height: 13
  318. -- part name: Keyword
  319.  
  320.  
  321. -- part 26 (button)
  322. -- low flags: 00
  323. -- high flags: A002
  324. -- rect: left=229 top=238 right=254 bottom=274
  325. -- title width / last selected line: 0
  326. -- icon id / first selected line: 0 / 0
  327. -- text alignment: 1
  328. -- font id: 0
  329. -- text size: 12
  330. -- style flags: 0
  331. -- line height: 16
  332. -- part name: Text
  333. ----- HyperTalk script -----
  334. on mouseUp
  335.   show menuBar
  336.   play "buttons1"
  337.   visual dissolve
  338.   go to card id 25252
  339. end mouseUp
  340.  
  341.